home *** CD-ROM | disk | FTP | other *** search
/ Power Programmierung / Power-Programmierung (Tewi)(1994).iso / magazine / progjour / 1991 / 02 / otkenlet.asm < prev    next >
Assembly Source File  |  1991-02-10  |  768b  |  30 lines

  1. ; Code from John Otken
  2. ; illustrate freeing memory from assembly language
  3.  
  4.      dosseg
  5.      .model small
  6.      .stack
  7.      .code
  8.  
  9. ;;   main 
  10. ;
  11. main proc
  12.      mov  bx,offset stack+15 ; compute program size in paragraphs
  13.      mov  cl,4               ; SS != DGROUP in program
  14.      shr  bx,cl
  15.      add  bx,data
  16.      mov  ax,es              ; ES == Program Segment Prefix 
  17.      sub  bx,ax
  18.  
  19.      mov  ah,4Ah             ; shrink program's memory block
  20.      int 21h 
  21.  
  22.      mov  ah,48h             ; allocate 16 paragraphs of memory
  23.      mov  bx,16              ; (16 paragraphs == 256 bytes)
  24.      int  21h
  25.  
  26.      mov ax,4C00h            ; exit program
  27.      int  21h
  28. main endp
  29.  
  30.